% FWEAVE v1.30 (May 15, 1993)

\input fwebmac.sty

\Wbegin[]{article}{1em}{1em}{f0to_web.cts}{{\&}{\|}{\\}{\\}{\\}{\@}{\.}{\.}}

% --- Beginning of user's limbo section ---



\WN1.  The MAIN PROGRAM.  {\it (Explain the purpose of the code here, using the
full power of \TeX\ to help you.)}
\WY\WP \&{program} \1\\{main}\WIN1{0}\2\7
\Wc{ Do the computation of~$\alpha$.}\1\6
\&{call} \\{compute}\WIN1{2}\2\6
\&{end}\WY\par
\fi % End of module 1

\WN2.  COMPUTATIONAL ROUTINES.  {\it (Explain the general philosophy of the
computational algorithm here.)}
\WY\WP \&{subroutine} \1\\{compute}\WIN1{0}\2\1\6
\&{call} \\{compute1}\WIN1{3}\2\6
\&{end}\WY\par
\fi % End of module 2

\WM3. {\it (Other computational routines should be minor sections, all grouped
under the major section called ``\.{COMPUTATIONAL ROUTINES}''.)}
\WY\WP \&{subroutine} \1\\{compute1}\WIN1{0}\2\6
\&{end}\WY\par
\fi % End of module 3

\WN4.  INDEX.  {\it (An index is produced automatically.  It's customary to
make
the index a separate major section.)}
\fi % End of module 4

\input f0to_web.ndx
\input f0to_web.mds

\Winfo{"fweave ./f0to\_web -zdemos.sty -=f0to\_web.tex"}  {"./f0to\_web.web"}
{(none)}
 {FORTRAN}

\Wcon
